module Model where
score :: [Double] -> [Double]
score input =
    [((((9.699944289095386) + (((input) !! (0)) * (-0.4130233139914477))) + (((input) !! (1)) * (0.9683469583830324))) + (((input) !! (2)) * (-2.4984059588369045))) + (((input) !! (3)) * (-1.0715202355664082)), ((((2.1566741402654785) + (((input) !! (0)) * (0.5401926550713264))) + (((input) !! (1)) * (-0.32448882769641735))) + (((input) !! (2)) * (-0.20330362136041338))) + (((input) !! (3)) * (-0.9342738330217771)), ((((-11.856618429361765) + (((input) !! (0)) * (-0.12716934107987374))) + (((input) !! (1)) * (-0.6438581306866125))) + (((input) !! (2)) * (2.701709580197313))) + (((input) !! (3)) * (2.0057940685881865))]
